home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 87 / 64er_Magazin_Sonderheft_87_19xx_Markt__Technik_de_Side_B.d64 / alle 8 sprites (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  345b  |  14 lines

  1. 5 ifa=0thena=1:load"demo-sprites",8,1
  2. 10 rem alle acht sprites auf den screen
  3. 20 v=53248:rem basisadresse vic
  4. 30 x=30:y=100:z=0:print"[147]"
  5. 40 for i=0 to 7
  6. 50 :  pokev+z,x:rem spritepositionen
  7. 60 :  pokev+z+1,y:rem setzen
  8. 70 :  x=x+30:z=z+2
  9. 80 :  pokev+39+i,i:rem farben zuweisen
  10. 90 :  poke2040+i,255:rem block 255
  11. 100 next
  12. 110 pokev+21,255:rem alle sprites an
  13. 120 fori=0to10:print:next:list
  14.